﻿Public Class RjClsVoucherBody

    Private m_Month As Integer
    Private m_Type As String
    Private m_Number As Integer
    Private m_Attachment As Integer

    Public Property Month As Integer
        Get
            Return m_Month
        End Get
        Set(value As Integer)
            m_Month = value
        End Set
    End Property

    Public Property Type As String
        Get
            Return m_Type
        End Get
        Set(value As String)
            m_Type = value
        End Set
    End Property

    Public Property Number As Integer
        Get
            Return m_Number
        End Get
        Set(value As Integer)
            m_Number = value
        End Set
    End Property

    Public Property Attachment As Integer
        Get
            Return m_Attachment
        End Get
        Set(value As Integer)
            m_Attachment = value
        End Set
    End Property
End Class
